#pragma once

#include <sys/select.h>
#include <sys/types.h>
#include <unistd.h>
#include <sys/time.h>
#include "Log.hpp"
#include "Socket.hpp"

#define NUM 1024
#define FD_NONE -1

class SelectServer
{
public:
    SelectServer(const uint16_t &port = 8080)
        : _port(port)
    {
        _listensock = Sock::Socket();
        Sock::Bind(_listensock, _port);
        Sock::Listen(_listensock);

        // 对readarray先置NONE，listenfd在第一个位置
        for(int i = 0; i < NUM; ++i)
        {
            _read_array[i] = FD_NONE;
        }
        _read_array[0] = _listensock;
    }

    void start()
    {
        // listensock本质就是IO，在linsten的时候就完成了TCP三次握手，并且放在了全连接的队列里面
        // accept本质是从listensock文件里读，看看是否有就绪 -- 阻塞式
        // 这里想要用select，交给他等

        while (true)
        {
            fd_set rfds;
            FD_ZERO(&rfds);
            // 重新设置rfds
            int maxfd = _listensock;
            for(int i = 0; i < NUM; ++i)
            {
                if(_read_array[i] == FD_NONE) continue;
                FD_SET(_read_array[i], &rfds);
                if(maxfd < _read_array[i]) maxfd = _read_array[i]; // 更新最大的fd
            }
            // timeval timeout = {0, 0};
            // int ret = select(_listensock + 1, &rfds, nullptr, nullptr, &timeout); // 非阻塞等待
            int ret = select(maxfd + 1, &rfds, nullptr, nullptr, nullptr); // 阻塞等待
            switch (ret)
            {
            case 0:
                Messagelog(DEBUG, "select没有就绪 time out ...");
                break;
            case -1:
                Messagelog(WARNING, "select listensock error %d:%s", errno, strerror(errno));
                break;
            default:
                // 就绪了，处理
                HandlerEvent(rfds);
                break;
            }
        }

        // 测试
        // int fd = Sock::Accept(_listensock, nullptr, nullptr);
        // std::cout << fd << std::endl;
    }

    ~SelectServer()
    {
        if (_listensock > 0)
            close(_listensock);
    }

private:
    void HandlerEvent(const fd_set& rfds)
    {
        // rfds是就绪的名单
        for(int pos = 0; pos < NUM; ++pos)
        {
            if(_read_array[pos] == FD_NONE) continue;
            if(!FD_ISSET(_read_array[pos], &rfds)) continue;
            // 就绪的pos
            if(pos == 0) Accepter();
            else Recver(pos);
        }
    }

    // listen
    void Accepter()
    {
        int sock = Sock::Accept(_listensock, nullptr, nullptr);
        if(sock < 0) exit(1);
        int i = 0;
        for(; i < NUM; ++i)
        {
            if(_read_array[i] == FD_NONE) break;
        }
        if(i == NUM) {
            Messagelog(ERROR, "_read_array full close sock %d", sock);
            close(sock);
        }
        else {
            _read_array[i] = sock;
            Messagelog(DEBUG, "accept successful sock %d", sock);
        }
    }

    void Recver(int pos)
    {
        char buffer[1024];
        ssize_t sz = recv(_read_array[pos], buffer, sizeof(buffer) - 1, 0);
        if(sz > 0)
        {
            buffer[sz] = 0;
            std::cout << "client[ " << _read_array[pos] << " ]: " << buffer << std::endl;
        }
        else if(sz == 0)
        {
            Messagelog(DEBUG, "client[%d] quit, me too...", _read_array[pos]);
            close(_read_array[pos]);
            _read_array[pos] = FD_NONE;
        }
        else
        {
            Messagelog(ERROR, "Recv sock[%d] error %d:%s", _read_array[pos], errno, strerror(errno));
        }
    }

private:
    uint16_t _port;
    int _listensock;
    int _read_array[NUM];
};